(dos-codepage-setup): Call prefer-coding-system

to set the appropriate cpNNN-dos coding system as the
highest-priority coding system.

diff --git a/lisp/term/internal.el b/lisp/term/internal.el
index 0cfa3025f5020ea4360867d470393862c0cdf6c5..2b0806839cd8c01113c83211b88c508411c4ff06 100644 (file)
--- a/lisp/term/internal.el
+++ b/lisp/term/internal.el
@@ -272,6 +272,7 @@ list.  You can (and should) also run it whenever the value of
      (setq default-terminal-coding-system (intern (concat cp
                                                          "-unix"))))
     (IT-display-table-setup cp)
+    (prefer-coding-system (intern (concat cp "-dos")))
     ;; Some codepages have sporadic support for Latin-1, Greek, and
     ;; symbol glyphs, which don't belong to their native character
     ;; set.  It's a nuisance to have all those glyphs here, for all